home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 4: GNU Archives / Linux Cubed Series 4 - GNU Archives.iso / gnu / binutils.7 / binutils / binutils-2.7 / gas / testsuite / gasp / pl6.out < prev    next >
Encoding:
Text File  |  1996-07-04  |  801 b   |  55 lines
  1. !    .ALTERNATE
  2. !! test of expression operator
  3.     ! test of expression operator
  4. !define     MACRO     val, string
  5. !    SDATA     val
  6. !    SDATA    string
  7. !    ENDM
  8. !    define "1","99%of100"    ! notice % within string
  9. !    SDATA     "1"
  10.     .byte    49
  11. !    SDATA    "99%of100"
  12.     .byte    57,57,37,111,102,49,48,48
  13. !    define     %1 + 2, "=3"
  14. !    SDATA     3
  15.     .byte    51
  16. !    SDATA    "=3"
  17.     .byte    61,51
  18. !
  19.  
  20. !
  21.  
  22. !    define     % 1 + 2 %3+4
  23. !    SDATA     3
  24.     .byte    51
  25. !    SDATA    7
  26.     .byte    55
  27. !
  28.  
  29. !    define    %3*4-2  <=10>
  30. !    SDATA     10
  31.     .byte    49,48
  32. !    SDATA    "=10"
  33.     .byte    61,49,48
  34. !
  35.  
  36. !    define    %3*4-2  5
  37. !    SDATA     10
  38.     .byte    49,48
  39. !    SDATA    5
  40.     .byte    53
  41. !
  42.  
  43. !    define    %1 + 2,<is equal to %1 + 2, right?>
  44. !    SDATA     3
  45.     .byte    51
  46. !    SDATA    "is equal to %1 + 2, right?"
  47.     .byte    105,115,32,101,113,117,97,108,32,116,111,32,37,49,32,43,32,50,44,32,114,105,103,104,116,63
  48. !
  49.  
  50. !    ! has no effect
  51.     ! has no effect
  52. !
  53.  
  54. !    end
  55.